powComplex, real part

Time bar (total: 11.9s)

start0.0ms (0%)

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

analyze408.0ms (3.4%)

Memory
35.9MiB live, 507.9MiB allocated; 47ms 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)

sample2.9s (24.6%)

Memory
87.5MiB live, 3 729.2MiB allocated; 811ms collecting garbage
Samples
1.5s2 978×1valid
901.0ms5 278×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.0s
ival-mult: 471.0ms (24.1% of total)
ival-log: 345.0ms (17.7% of total)
ival-hypot: 306.0ms (15.7% of total)
adjust: 264.0ms (13.5% of total)
ival-cos: 218.0ms (11.2% of total)
ival-atan2: 152.0ms (7.8% of total)
ival-exp: 87.0ms (4.5% of total)
ival-add: 55.0ms (2.8% of total)
ival-sub: 51.0ms (2.6% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain469.0ms (3.9%)

Memory
-4.5MiB live, 712.3MiB allocated; 74ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1820-0-(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
1280-1(1.163081559258246e-160 1.2257656455381883e-185 -3.681523701631174e+125 4.7093992982443015e+114)(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
30-1(6.257053194292254e+277 4.450931503123255e-37 -0.1392054084815369 1.4281112684154543e+85)(*.f64 (atan2.f64 x.im x.re) y.im)
10-0-(*.f64 (atan2.f64 x.im x.re) y.re)
10-1(6.257053194292254e+277 4.450931503123255e-37 -0.1392054084815369 1.4281112684154543e+85)(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
00-0-(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
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-y.re
00-0-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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
00-0-(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))sensitivity1820
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))oflow-rescue1120
↳(*.f64 x.re x.re)overflow68
↳(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))overflow112
↳(*.f64 x.im x.im)overflow59
*.f64(*.f64 (atan2.f64 x.im x.re) y.im)n*u10
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))uflow-rescue10
↳(*.f64 x.re x.re)underflow49
↳(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))underflow15
↳(*.f64 x.im x.im)underflow64
Confusion
Predicted +Predicted -
+1480
-6444
Precision
0.6981132075471698
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+14800
-64044
Precision?
0.6981132075471698
Recall?
1.0
Freqs
test
numberfreq
044
1129
282
31
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
170.0ms360×1valid
24.0ms152×0valid
Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 158.0ms
ival-mult: 46.0ms (29.1% of total)
adjust: 24.0ms (15.2% of total)
ival-cos: 21.0ms (13.3% of total)
ival-hypot: 20.0ms (12.6% of total)
ival-log: 18.0ms (11.4% of total)
ival-atan2: 11.0ms (7% of total)
ival-add: 9.0ms (5.7% of total)
ival-exp: 5.0ms (3.2% of total)
ival-sub: 4.0ms (2.5% of total)
ival-true: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)

preprocess182.0ms (1.5%)

Memory
2.9MiB live, 283.4MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0141575
1437556
21292554
33522552
01937
03437
16936
217936
339736
494536
5509936
0811125
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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (exp.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (+.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (fma.f64 (atan2.f64 x.im x.re) y.re (/.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal -1 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re))
Compiler

Compiled 37 to 19 computations (48.6% saved)

eval0.0ms (0%)

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

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

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

Compiled 37 to 19 computations (48.6% saved)

series302.0ms (2.5%)

Memory
14.9MiB live, 257.1MiB allocated; 36ms 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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (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
(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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
70.0ms
y.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (cos (+ (* (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))
69.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (cos (+ (* (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))
37.0ms
x.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (cos (+ (* (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))
34.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (cos (+ (* (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.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (cos (+ (* (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))

rewrite235.0ms (2%)

Memory
30.2MiB live, 359.5MiB allocated; 48ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158020016
0161119810
0811116912
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
291 → 338
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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (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
(cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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/4 binary64) (/.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 6 binary64))) (*.f64 (neg.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (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 (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64))) (*.f64 (neg.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (+ (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 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 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 #s(literal 1 binary64) (*.f64 x.re x.re) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 x.re x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (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 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (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/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.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 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 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)))) (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.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 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (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)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.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 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 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 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (neg.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/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.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 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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/4 binary64) (/.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (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 6 binary64))) (*.f64 (neg.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (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 (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64))) (*.f64 (neg.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (+ (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 #s(literal 1 binary64) (*.f64 x.im x.im) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (*.f64 x.im x.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (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 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.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)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.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 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 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)))) (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.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 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (exp.f64 (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)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.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 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 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 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (neg.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/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.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 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (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))) (cos (+ (* (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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.re (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)) y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #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.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) y.re (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (fma.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) y.re (*.f64 (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (neg.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.im (*.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (*.f64 #s(literal 1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (fma.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) y.im (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) y.im))))

eval71.0ms (0.6%)

Memory
-32.2MiB live, 110.1MiB allocated; 20ms collecting garbage
Compiler

Compiled 33 430 to 2 857 computations (91.5% saved)

prune153.0ms (1.3%)

Memory
-8.6MiB live, 166.0MiB allocated; 69ms collecting garbage
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New44610456
Fresh000
Picked101
Done000
Total44710457
Accuracy
92.8%
Counts
457 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶76.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
63.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))) (-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
64.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))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
▶50.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
20.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))))))
▶13.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
21.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.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 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
▶12.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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))))))))
33.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
▶34.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
Compiler

Compiled 1 466 to 734 computations (49.9% saved)

series884.0ms (7.4%)

Memory
27.6MiB live, 1 008.1MiB allocated; 158ms collecting garbage
Counts
93 → 1 038
Calls
Call 1
Inputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(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)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(cos.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)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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)))))
(neg.f64 (*.f64 x.re x.re))
(fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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))))
(fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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(literal -1/8 binary64)
(/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))
(*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 y.im y.im)
(pow.f64 x.im #s(literal 4 binary64))
#s(literal 4 binary64)
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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(literal 1/4 binary64)
(/.f64 (*.f64 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 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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(literal -1/2 binary64)
(/.f64 (*.f64 y.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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
(neg.f64 (*.f64 x.im x.im))
(fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
(fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))
(*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 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 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 y.im (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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
Outputs
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (neg (* x.re x.re)) #s(hole binary64 (* -1 (pow x.re 2))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (log x.im)) (* 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.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (/ (- (* -1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (/ (- (* (pow x.re 2) (- (* (pow x.re 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* -1 (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* 1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/2 (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (pow x.re 4) #s(hole binary64 (pow x.re 4)))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 4) (- (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))) (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 4) (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (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.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (pow x.re 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (pow x.re 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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 x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (/ (- (* -1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (/ (- (* (pow x.im 2) (- (* (pow x.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* -1 (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (/ (+ (* -1 (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* 1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (+ (* -1/2 (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))))
#s(approx (pow x.im 4) #s(hole binary64 (pow x.im 4)))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (neg (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.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)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -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 (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.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.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (pow x.im 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow x.im 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow x.im 4) (- (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))) (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow x.im 4) (- (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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 (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (pow x.im 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* 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.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (* (log x.im) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (cos (* y.im (log x.im))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* -1 (* y.re (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (+ (* -1 (* y.re (+ (* -1 (* (pow x.re 2) (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)))))))) (* -1/6 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))) (* y.re (+ (* -1 (* (pow x.re 2) (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))) (* y.re (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* y.re (+ (* -1 (* (pow x.re 2) (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))))))) (* (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)))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (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)))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (+ (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (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)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* y.re (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* -1 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 4))) (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))) (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/2 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/6 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))) (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.im (log x.im))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (* (pow y.im 2) (cos (* y.im (log x.im)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (* -1/2 (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))))) (* (pow y.im 2) (cos (* y.im (log x.im)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))))))) (* (pow y.im 2) (cos (* y.im (log x.im)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))) (* 1/4 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* -1/24 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)) (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.im (log x.im))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))))))))))
#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 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* 1/12 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)) (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (cos (* y.im (log x.re))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.re))) (* -1 (* y.re (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (- (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (- (+ (* -1 (* y.re (+ (* -1 (* (pow x.im 2) (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)))))))) (* -1/6 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))) (* y.re (+ (* -1 (* (pow x.im 2) (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))) (* y.re (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* y.re (+ (* -1 (* (pow x.im 2) (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im 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 4))) (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im 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 4))) (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (+ (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im 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 4))) (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* y.re (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* -1 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 4))) (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))) (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/2 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/6 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))) (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.im (log x.re))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* (pow y.im 2) (cos (* y.im (log x.re)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* -1/2 (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))))) (* (pow y.im 2) (cos (* y.im (log x.re)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))))))) (* (pow y.im 2) (cos (* y.im (log x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))) (* 1/4 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* -1/24 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)) (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.im (log x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.re)))) (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.re)))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.re)))) (* y.re (+ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* 1/12 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)) (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.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)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.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)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* 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))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (* y.im (- (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1/6 (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* y.im (+ (* -1 (* (pow x.re 2) (* y.im (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))))))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))) (* y.im (+ (* -1 (* (pow x.re 2) (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (pow x.im 4))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4))) (* 1/6 (/ (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re))))))))))))))
#s(approx (* y.im y.im) #s(hole binary64 (pow y.im 2)))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 4)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* -1/24 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 4)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 4))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (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 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (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.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 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* 1/4 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* y.im (+ (* 1/12 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 2))) (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1/6 (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))))))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))) (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 4))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4))) (* 1/6 (/ (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 4)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* -1/24 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 4)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 4))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (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.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 2)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* 1/4 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* y.im (+ (* 1/12 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 2))) (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) y.im) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow y.im 2)) (+ (* -1 (/ (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/8 (/ (* (pow x.re 2) (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/8 (/ (* (pow x.re 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/8 (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/4 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) y.im) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow y.im 2)) (+ (* -1 (/ (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/8 (/ (* (pow x.im 2) (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/8 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/8 (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/4 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (/ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))) y.im)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) y.im)) (* -1/8 (/ (* (pow x.re 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) y.im)) (* -1/8 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
Calls

12 calls:

TimeVariablePointExpression
145.0ms
x.im
@inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* y.im y.im) (pow x.im 4) 4 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (sin (* y.re (atan2 x.im x.re))))
87.0ms
y.im
@-inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* y.im y.im) (pow x.im 4) 4 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (sin (* y.re (atan2 x.im x.re))))
82.0ms
y.im
@0
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* y.im y.im) (pow x.im 4) 4 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (sin (* y.re (atan2 x.im x.re))))
78.0ms
x.re
@0
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* y.im y.im) (pow x.im 4) 4 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (sin (* y.re (atan2 x.im x.re))))
69.0ms
y.re
@0
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* y.im y.im) (pow x.im 4) 4 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (sin (* y.re (atan2 x.im x.re))))

rewrite511.0ms (4.3%)

Memory
14.4MiB live, 672.0MiB allocated; 89ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0528682999
0547781143
0905776884
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 131 → 1 242
Calls
Call 1
Inputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(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)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(cos.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)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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)))))
(neg.f64 (*.f64 x.re x.re))
(fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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))))
(fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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(literal -1/8 binary64)
(/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))
(*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 y.im y.im)
(pow.f64 x.im #s(literal 4 binary64))
#s(literal 4 binary64)
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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(literal 1/4 binary64)
(/.f64 (*.f64 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 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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(literal -1/2 binary64)
(/.f64 (*.f64 y.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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
(neg.f64 (*.f64 x.im x.im))
(fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
(fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))
(*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 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 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 y.im (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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (neg (* x.re x.re)) #s(hole binary64 (* -1 (pow x.re 2))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (log x.im)) (* 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.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (/ (- (* -1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (/ (- (* (pow x.re 2) (- (* (pow x.re 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* -1 (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* 1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/2 (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (pow x.re 4) #s(hole binary64 (pow x.re 4)))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 4) (- (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))) (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow x.re 4) (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (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.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (pow x.re 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.im 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (* (pow x.im 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (pow x.re 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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) (* (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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 x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (/ (- (* -1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (/ (- (* (pow x.im 2) (- (* (pow x.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* -1 (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (/ (+ (* -1 (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* 1/2 (* (pow x.im 2) (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (+ (* -1/2 (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))))
#s(approx (pow x.im 4) #s(hole binary64 (pow x.im 4)))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (neg (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.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)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -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 (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.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.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (pow x.im 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow x.im 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow x.im 4) (- (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))) (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow x.im 4) (- (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 4) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (pow x.re 2)))) (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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 (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x.re 4) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (pow x.im 2))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (/ (+ (* -1/8 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (* 1/4 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* 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.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (* (log x.im) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (cos (* y.im (log x.im))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* -1 (* y.re (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (+ (* -1 (* y.re (+ (* -1 (* (pow x.re 2) (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)))))))) (* -1/6 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))) (* y.re (+ (* -1 (* (pow x.re 2) (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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)))))))) (* y.re (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* y.re (+ (* -1 (* (pow x.re 2) (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (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))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))))))) (* (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)))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (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)))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (+ (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))) (* (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)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* y.re (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* -1 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 4))) (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))) (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/2 (/ (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* 1/6 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))) (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.im (log x.im))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (* (pow y.im 2) (cos (* y.im (log x.im)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (* -1/2 (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))))) (* (pow y.im 2) (cos (* y.im (log x.im)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))))))) (* (pow y.im 2) (cos (* y.im (log x.im)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))) (* 1/4 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* -1/24 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)) (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 4)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.im (log x.im))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))))))))))
#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 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* 1/12 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* 1/4 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)) (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))) (/ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2)))) (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (cos (* y.im (log x.re))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.re))) (* -1 (* y.re (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (- (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (- (+ (* -1 (* y.re (+ (* -1 (* (pow x.im 2) (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)))))))) (* -1/6 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))) (* y.re (+ (* -1 (* (pow x.im 2) (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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)))))))) (* y.re (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))) (* y.re (+ (* -1 (* (pow x.im 2) (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log 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))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im 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 4))) (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im 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 4))) (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (+ (* y.re (+ (* 1/12 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im 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 4))) (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (+ (* -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))) (* y.re (+ (* 1/8 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/16 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* y.re (+ (* -1/24 (/ (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* -1/48 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* -1 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 4))) (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))) (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/2 (/ (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* 1/6 (/ (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))) (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.im (log x.re))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* (pow y.im 2) (cos (* y.im (log x.re)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* -1/2 (* (pow y.im 2) (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))))) (* (pow y.im 2) (cos (* y.im (log x.re)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow y.im 2) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow y.im 2) (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))))))) (* (pow y.im 2) (cos (* y.im (log x.re)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))) (* 1/4 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (+ (* 1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (+ (* 1/4 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4))) (* y.re (+ (* -1/8 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* -1/24 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)) (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 4)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.im (log x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.re)))) (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.re)))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.re)))) (* y.re (+ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* 1/12 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* 1/4 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (+ (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)) (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* -1/6 (/ (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))) (/ (* y.im (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2)))) (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (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)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.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)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.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)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* 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))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (* y.im (- (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1/6 (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))) (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* y.im (+ (* -1 (* (pow x.re 2) (* y.im (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))))))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* y.im (+ (* -1 (* (pow x.re 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))) (* y.im (+ (* -1 (* (pow x.re 2) (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4))))))))) (* -1 (* (pow x.re 2) (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/8 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (pow x.im 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (pow x.im 4))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)) (pow x.im 4))) (* 1/6 (/ (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re))))))))))))))
#s(approx (* y.im y.im) #s(hole binary64 (pow y.im 2)))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/4 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 4)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* -1/24 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 4)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 4))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (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 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (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.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 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* 1/4 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2))) (* y.im (+ (* 1/12 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 2))) (* 1/4 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (pow x.im 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow x.im 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1/6 (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))) (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))))))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* y.im (+ (* -1 (* (pow x.im 2) (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))) (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4))))))))) (* -1 (* (pow x.im 2) (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (+ (* y.im (+ (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* 1/12 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/8 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/24 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (pow x.re 4))) (* 1/16 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 4))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* -1 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)) (pow x.re 4))) (* 1/6 (/ (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))) (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* 1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/4 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 4)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) #s(hole binary64 (* y.im (+ (* 1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* 1/4 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4))) (* y.im (+ (* -1/8 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* -1/24 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 4)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 4))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 4)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (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.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* -1/2 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 2)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* 1/4 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2))) (* y.im (+ (* 1/12 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 2))) (* 1/4 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (pow x.re 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (pow x.re 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow x.re 2)))) (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) y.im) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow y.im 2)) (+ (* -1 (/ (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* 1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* -1/8 (/ (* (pow x.re 2) (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/8 (/ (* (pow x.re 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/8 (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/4 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) y.im) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow y.im 2)) (+ (* -1 (/ (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* 1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* -1/8 (/ (* (pow x.im 2) (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/8 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/8 (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/4 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) y.im)) (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/8 (/ (* (pow x.re 4) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (/ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))) y.im)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) y.im)) (* -1/8 (/ (* (pow x.re 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) y.im)) (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/8 (/ (* (pow x.im 4) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (/ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) y.im)) (* -1/8 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
Outputs
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(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)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.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)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
(pow.f64 (exp.f64 y.re) (log.f64 x.im))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(+.f64 (cosh.f64 (*.f64 y.re (log.f64 x.im))) (sinh.f64 (*.f64 y.re (log.f64 x.im))))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))))))))
(-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))))
(*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))))
(neg.f64 (*.f64 x.re x.re))
(fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))
(+.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))
(fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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(literal -1/8 binary64)
(/.f64 (neg.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (neg.f64 (pow.f64 x.im #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))
(*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (neg.f64 y.im) (neg.f64 y.im))
(*.f64 (fabs.f64 y.im) (fabs.f64 y.im))
(*.f64 y.im y.im)
(pow.f64 y.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y.im) #s(literal 2 binary64)))
(pow.f64 x.im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 4 binary64)))
#s(literal 4 binary64)
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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(literal 1/4 binary64)
(/.f64 (neg.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (neg.f64 (pow.f64 x.im #s(literal 4 binary64))))
(/.f64 (*.f64 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 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))
(/.f64 (neg.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (neg.f64 (*.f64 x.im x.im)))
(/.f64 (*.f64 y.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 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))))))))
(-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))))
(neg.f64 (*.f64 x.im x.im))
(fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))
(+.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))
(fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (neg.f64 (pow.f64 x.re #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))
(*.f64 (*.f64 y.im 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))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))
(/.f64 (neg.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (neg.f64 (pow.f64 x.re #s(literal 4 binary64))))
(/.f64 (*.f64 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 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))
(*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))
(/.f64 (neg.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (neg.f64 (*.f64 x.re x.re)))
(/.f64 (*.f64 y.im (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 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(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)
(exp.f64 (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(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))
#s(literal 1/2 binary64)
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.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)) (/ (PI) 2))) (+.f64 (cos.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 (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (cos.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 (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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))))
#s(approx (neg (* x.re x.re)) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 (*.f64 y.im 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))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 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 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (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 (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) (*.f64 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 (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 (*.f64 y.im 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))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow x.re 4) (pow.f64 x.re #s(literal 4 binary64)))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 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 (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 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)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.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)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 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)) (/ (PI) 2))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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)) (/ (PI) 2))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.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 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (exp (* y.re (log x.im))) (pow.f64 x.im y.re))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.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)) (/ (PI) 2))) (+.f64 (cos.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 (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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (cos.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 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (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 x.im x.im) (*.f64 (*.f64 x.re x.re) (*.f64 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 (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.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) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 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 (pow x.im 4) (pow.f64 x.im #s(literal 4 binary64)))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (cos.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 (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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))))
#s(approx (neg (* x.im x.im)) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im)))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 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)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))) (*.f64 x.im x.im)))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (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 #s(literal -1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (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 (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (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 (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.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)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (+.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))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (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 (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 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)) (/ (PI) 2))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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)) (/ (PI) 2))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.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 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (sin.f64 (+.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))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (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)))))) (*.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (+.f64 (sin.f64 (+.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))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 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)))))) (*.f64 x.im x.im)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (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)))))) (*.f64 x.im x.im))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (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)))))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (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)))))))) (*.f64 x.im x.im)))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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))))) (*.f64 x.im x.im))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (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))))) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (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)))))))) (*.f64 x.im x.im))) (*.f64 x.im x.im)))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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))))) (*.f64 x.im x.im))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (/.f64 (*.f64 y.im (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))))) (*.f64 x.im x.im)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx y.re y.re)
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.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 (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* y.re (log x.im))) #s(literal 1 binary64))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (PI.f64) #s(literal 2 binary64))))) (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)))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (+.f64 (*.f64 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (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) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (PI.f64) #s(literal 2 binary64))))) (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)))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (fma.f64 y.re (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im))) (fma.f64 y.re (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (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) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (PI.f64) #s(literal 2 binary64))))) (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)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (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))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.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 y.re (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.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 y.re (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 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 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.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 y.re (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 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 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 y.im 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 4 binary64))) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.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)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+.f64 (*.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/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (fma.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 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.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))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (fma.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 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (+.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (fma.f64 y.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))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.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 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.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.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.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 x.im x.im)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im)))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (/.f64 (+.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (fma.f64 y.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))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 x.im x.im)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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)))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (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))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (PI.f64) #s(literal 2 binary64))))) (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)))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (+.f64 (*.f64 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (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) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (PI.f64) #s(literal 2 binary64))))) (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)))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (fma.f64 y.re (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re))) (fma.f64 y.re (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (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) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (PI.f64) #s(literal 2 binary64))))) (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)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (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))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.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 y.re (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.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 y.re (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 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 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (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 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.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 y.re (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 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 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/16 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 y.im 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 4 binary64))) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.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)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+.f64 (*.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/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (fma.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 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (fma.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 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/24 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (+.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 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/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (/.f64 (+.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 x.re x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (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 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (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 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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 (*.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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/.f64 (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.im) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im x.re) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx y.im y.im)
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re)))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (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)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.im) (sin.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 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.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 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.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 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im)) (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.im) (sin.f64 (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im)) (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.im) (sin.f64 (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.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/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))
#s(approx (* y.im y.im) (*.f64 y.im y.im))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/8 binary64) (/.f64 (*.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))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (*.f64 y.im (/.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)) (*.f64 y.im (fma.f64 y.im (fma.f64 y.im (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)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 x.im #s(literal 4 binary64)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (*.f64 x.im x.im))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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 x.im x.im))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (*.f64 y.im (/.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))) (*.f64 x.im x.im))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)) (*.f64 y.im (fma.f64 y.im (fma.f64 y.im (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)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 x.im x.im)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (*.f64 x.im x.im))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.re) (sin.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 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.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 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.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 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re)) (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.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/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.re) (sin.f64 (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re)) (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.re) (sin.f64 (*.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 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.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 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/8 binary64) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.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/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (/.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))))
#s(approx (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 (*.f64 y.im y.im) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/8 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.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/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (*.f64 y.im (/.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)) (*.f64 y.im (fma.f64 y.im (fma.f64 y.im (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)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (+.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.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))) (*.f64 x.re x.re))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (*.f64 y.im (/.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))) (*.f64 x.re x.re))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))
#s(approx (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)) (*.f64 y.im (fma.f64 y.im (fma.f64 y.im (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)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 x.re x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 x.re x.re))) (/.f64 (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im 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)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64)))))) y.im) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64)))))) y.im) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im 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)))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64)))))) y.im) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im 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)))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (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/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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.im #s(literal 4 binary64)) y.im)))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (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/4 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im 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)))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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)))))) y.im) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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)))))) y.im) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im 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)))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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)))))) y.im) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im 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)))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)))))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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)))))
#s(approx (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (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/4 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))) y.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))) y.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))))))
#s(approx (* (neg (* x.re x.re)) (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))) y.im))))
#s(approx (+ (* (* x.re x.re) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* x.im x.im)))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))) y.im) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (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)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))) y.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))))))
#s(approx (- (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))))) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))) y.im)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* (neg (* x.im x.im)) (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))) y.im))))
#s(approx (+ (* (* x.im x.im) (+ (* -1/8 (/ (* (* y.im y.im) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* x.re x.re)))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.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 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))) y.im) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))

eval305.0ms (2.6%)

Memory
42.9MiB live, 539.7MiB allocated; 76ms collecting garbage
Compiler

Compiled 240 521 to 11 969 computations (95% saved)

prune1.2s (9.7%)

Memory
-76.7MiB live, 813.3MiB allocated; 1.3s collecting garbage
Pruning

13 alts after pruning (12 fresh and 1 done)

PrunedKeptTotal
New1 986111 997
Fresh415
Picked415
Done000
Total1 994132 007
Accuracy
95.7%
Counts
2 007 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶76.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
38.7%
(*.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 (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 (PI.f64) #s(literal 2 binary64)))))
36.7%
(*.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 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
73.5%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
37.4%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
▶75.2%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
59.1%
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶52.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
63.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))) (-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
▶46.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
✓12.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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))))))))
67.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
▶32.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
Compiler

Compiled 1 410 to 835 computations (40.8% saved)

series575.0ms (4.8%)

Memory
-12.7MiB live, 688.7MiB allocated; 153ms collecting garbage
Counts
78 → 828
Calls
Call 1
Inputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
(*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
(cos.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)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
#s(literal 1 binary64)
(*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(fma.f64 #s(literal 1/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(literal 1/6 binary64)
(*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(pow.f64 (atan2.f64 x.im x.re) #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 (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(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))
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
Outputs
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* 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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))
#s(approx (* y.im (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* y.im (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/2 (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* 1/2 (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 (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* 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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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 x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -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 (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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 (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/6 (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* 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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (* (log x.im) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/6 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)))))
#s(approx (sin (+ (* (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* 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))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (* y.im (- (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* 1/2 (pow (atan2 x.im x.re) 2))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* 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 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (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.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* 1/6 (* (pow y.im 3) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (/ (atan2 x.im x.re) (pow y.im 2)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (+ (/ 1 (pow y.im 3)) (/ (atan2 x.im x.re) (pow y.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* 1/6 (* (pow y.im 3) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (/ (atan2 x.im x.re) (pow y.im 2)))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* 1/6 (* (pow y.im 2) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.im 2) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.im 2) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (/ (atan2 x.im x.re) (pow y.im 2)))))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* 1/6 (* y.im (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (/ (atan2 x.im x.re) y.im)) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1 (/ (- (* -1 (atan2 x.im x.re)) (/ 1 y.im)) y.im)) (* 1/2 (pow (atan2 x.im x.re) 2))) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (/ (atan2 x.im x.re) y.im)) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (/ (atan2 x.im x.re) y.im)) (* -1/2 (pow (atan2 x.im x.re) 2))) y.im)) (* 1/6 (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (- (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
Calls

12 calls:

TimeVariablePointExpression
82.0ms
x.re
@0
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (sin (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) 1/6 (* y.im (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (* 1/2 (pow (atan2 x.im x.re) 2)) 1/2 (pow (atan2 x.im x.re) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (sin (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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)) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
56.0ms
x.re
@inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (sin (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) 1/6 (* y.im (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (* 1/2 (pow (atan2 x.im x.re) 2)) 1/2 (pow (atan2 x.im x.re) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (sin (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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)) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
54.0ms
x.im
@inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (sin (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) 1/6 (* y.im (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (* 1/2 (pow (atan2 x.im x.re) 2)) 1/2 (pow (atan2 x.im x.re) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (sin (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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)) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
47.0ms
x.im
@-inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (sin (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) 1/6 (* y.im (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (* 1/2 (pow (atan2 x.im x.re) 2)) 1/2 (pow (atan2 x.im x.re) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (sin (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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)) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))
39.0ms
x.re
@-inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (sin (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (log x.im) (* y.re (atan2 x.im x.re)) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))) (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) 1/6 (* y.im (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (* 1/2 (pow (atan2 x.im x.re) 2)) 1/2 (pow (atan2 x.im x.re) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (sin (* y.re (atan2 x.im x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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)) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))

rewrite528.0ms (4.4%)

Memory
43.7MiB live, 608.1MiB allocated; 91ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0463977060
0478172882
0853167150
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
906 → 1 014
Calls
Call 1
Inputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(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)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
(*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
(cos.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)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
#s(literal 1 binary64)
(*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(fma.f64 #s(literal 1/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(literal 1/6 binary64)
(*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(pow.f64 (atan2.f64 x.im x.re) #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 (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(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))
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* 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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))
#s(approx (* y.im (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* y.im (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/2 (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* 1/2 (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 (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* 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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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 x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -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 (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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 (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/6 (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* 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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (* (log x.im) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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 (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/6 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)))))
#s(approx (sin (+ (* (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* 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))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (* y.im (- (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* 1/2 (pow (atan2 x.im x.re) 2))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* 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 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (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.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* 1/6 (* (pow y.im 3) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (/ (atan2 x.im x.re) (pow y.im 2)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (+ (/ 1 (pow y.im 3)) (/ (atan2 x.im x.re) (pow y.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* 1/6 (* (pow y.im 3) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.im 3) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (/ (atan2 x.im x.re) (pow y.im 2)))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* 1/6 (* (pow y.im 2) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.im 2) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.im 2) (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (/ (atan2 x.im x.re) (pow y.im 2)))))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* 1/6 (* y.im (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (/ (pow (atan2 x.im 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (/ (atan2 x.im x.re) y.im)) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1 (/ (- (* -1 (atan2 x.im x.re)) (/ 1 y.im)) y.im)) (* 1/2 (pow (atan2 x.im x.re) 2))) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* 1/2 (pow (atan2 x.im x.re) 2)) (/ (atan2 x.im x.re) y.im)) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (/ (atan2 x.im x.re) y.im)) (* -1/2 (pow (atan2 x.im x.re) 2))) y.im)) (* 1/6 (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (pow (atan2 x.im x.re) 2) y.im)) (* -1/6 (pow (atan2 x.im x.re) 3)))))))
#s(approx (- (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
Outputs
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(literal 1 binary64)
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
(*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.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)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
(pow.f64 (exp.f64 y.re) (log.f64 x.im))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(+.f64 (cosh.f64 (*.f64 y.re (log.f64 x.im))) (sinh.f64 (*.f64 y.re (log.f64 x.im))))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
#s(literal 1 binary64)
(*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(+.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))
(fma.f64 #s(literal 1/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))))
(+.f64 (*.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(literal 1/6 binary64)
(*.f64 y.im (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)
(*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (atan2.f64 x.im x.re) (atan2.f64 x.im x.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(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)
(exp.f64 (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(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))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) (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 (* y.im (pow (atan2 x.im x.re) 3)) (*.f64 y.im (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/2 (pow (atan2 x.im x.re) 2)) (*.f64 #s(literal 1/2 binary64) (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 (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (cos.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.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 (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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.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 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (exp (* y.re (log x.im))) (pow.f64 x.im y.re))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (cos.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.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 (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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 (/.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (/.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (+.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))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (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 (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.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 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx y.re y.re)
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.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 (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* y.re (log x.im))) #s(literal 1 binary64))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (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 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (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 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/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 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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 (*.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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx y.im y.im)
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 y.im (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re)))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (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 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im)))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.im y.im))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (+.f64 (pow.f64 (*.f64 (*.f64 y.im y.im) y.im) #s(literal -1 binary64)) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.im y.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (*.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im)))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.im y.im))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (*.f64 (*.f64 y.im y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im)))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (*.f64 (*.f64 y.im y.im) (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.im y.im))))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) (*.f64 y.im (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 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (atan2.f64 x.im x.re) y.im)) y.im) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)) y.im) (/.f64 (pow.f64 y.im #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.im) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.im y.im) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (atan2.f64 x.im x.re) y.im)) y.im) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im) (*.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.im) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.im) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))

eval304.0ms (2.6%)

Memory
-4.1MiB live, 414.4MiB allocated; 80ms collecting garbage
Compiler

Compiled 184 091 to 9 310 computations (94.9% saved)

prune591.0ms (5%)

Memory
13.8MiB live, 865.4MiB allocated; 117ms collecting garbage
Pruning

14 alts after pruning (10 fresh and 4 done)

PrunedKeptTotal
New1 76291 771
Fresh617
Picked145
Done101
Total1 770141 784
Accuracy
95.7%
Counts
1 784 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.8%
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
✓76.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
38.7%
(*.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.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 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶36.7%
(*.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
37.4%
(*.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶46.0%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
37.7%
(*.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))) (cos.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))))
▶37.1%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
81.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
✓52.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
▶82.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
✓46.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
▶67.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
✓32.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
Compiler

Compiled 1 377 to 802 computations (41.8% saved)

series307.0ms (2.6%)

Memory
9.7MiB live, 540.3MiB allocated; 113ms collecting garbage
Counts
73 → 906
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(neg.f64 x.im)
(neg.f64 x.re)
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(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.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))) (fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))
(*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (neg x.re) #s(hole binary64 (* -1 x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (neg x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/6 (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* -1/6 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) 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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* 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 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/6 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* (log (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
31.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) (neg x.im) (neg x.re) (sin (* 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))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (cos (/ (PI) 2)) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sin (/ (PI) 2)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))
23.0ms
y.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) (neg x.im) (neg x.re) (sin (* 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))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (cos (/ (PI) 2)) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sin (/ (PI) 2)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))
22.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) (neg x.im) (neg x.re) (sin (* 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))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (cos (/ (PI) 2)) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sin (/ (PI) 2)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))
22.0ms
y.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) (neg x.im) (neg x.re) (sin (* 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))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (cos (/ (PI) 2)) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sin (/ (PI) 2)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))
21.0ms
y.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) (neg x.im) (neg x.re) (sin (* 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))) (cos (+ (* (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) (cos (+ (* (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (cos (/ (PI) 2)) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (sin (/ (PI) 2)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) (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)) (/ (PI) 2))) (sin (/ (PI) 2))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))

rewrite513.0ms (4.3%)

Memory
7.0MiB live, 707.1MiB allocated; 86ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0471483839
0484077809
0838572354
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
979 → 1 161
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(neg.f64 x.im)
(neg.f64 x.re)
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(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.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))) (fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))
(*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (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 (* (exp (- (* y.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))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (neg x.re) #s(hole binary64 (* -1 x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* 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 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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (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)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (* 1/2 (/ (* 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 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (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.im 2) (+ (* -1/2 (/ (* y.im (* (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))) (+ (* 1/2 (/ (* 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 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* 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 4))) (+ (* (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)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (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 (* (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))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (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/8 (/ (pow y.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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* 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) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* 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)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (neg x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re))) (exp (* 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))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.re 2))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* 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 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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 (* (cos (+ (* -1 (* y.im (log (/ 1 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))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ 1 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.im (* (exp (- (* -1 (* y.re (log (/ 1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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 (* (cos (+ (* -1 (* y.im (log (/ -1 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))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/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 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (- (* -1 (* y.re (log (/ -1 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.im (* (exp (- (* -1 (* y.re (log (/ -1 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 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* 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 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* 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 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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.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)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 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/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/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/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (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) (cos (+ (* -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) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (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 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re)))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg 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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* 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 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -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.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 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))))))))) (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -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.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -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)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 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)) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (sin (* 1/2 (PI)))))) (pow x.im 2))) (+ (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (sin (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* 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)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (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)))))) (atan2 x.im x.re))))) (+ (* -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 (atan2 x.im 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)))) (* y.re (+ (* -1/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)))) (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)))))) (atan2 x.im x.re))))) (+ (* 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 (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (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) 3)))))))))))) (* (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))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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))))))
#s(approx (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* 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)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/6 (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* -1/6 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (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)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* 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)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) 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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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))) (cos (+ (* (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 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 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/6 (* (cos (* 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/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 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))) (pow (sqrt (+ (pow 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* 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 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* 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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (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))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/6 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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 (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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))) (cos (/ (PI) 2))) (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))))) (+ (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* 1/2 (PI))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) (* (sin (* 1/2 (PI))) (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* 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)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #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)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -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)) (/ (PI) 2))) (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* (log (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
Outputs
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (fabs.f64 x.im))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 x.im))
(hypot.f64 (neg.f64 (neg.f64 x.re)) x.im)
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (neg.f64 x.im))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 (neg.f64 x.re) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 (neg.f64 x.im)))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re (fabs.f64 (neg.f64 x.im)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))))
(log.f64 (hypot.f64 (neg.f64 x.im) x.re))
(pow.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (fabs.f64 x.re))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 x.re))
(hypot.f64 (neg.f64 (neg.f64 x.im)) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (neg.f64 x.re))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) x.re)
(hypot.f64 (neg.f64 x.im) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 x.im) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 (neg.f64 x.re)))
(hypot.f64 x.im (fabs.f64 (neg.f64 x.re)))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (*.f64 (log.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(neg.f64 x.im)
(neg.f64 x.re)
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (fabs.f64 x.im))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 x.im))
(hypot.f64 (neg.f64 (neg.f64 x.re)) x.im)
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) (neg.f64 x.im))
(hypot.f64 (fabs.f64 (neg.f64 x.re)) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 (neg.f64 x.re) (neg.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 (neg.f64 x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 (neg.f64 x.im)))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re (fabs.f64 (neg.f64 x.im)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (neg.f64 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 (neg.f64 x.re)) (fabs.f64 (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 (neg.f64 x.re) (neg.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 (neg.f64 x.re)) (neg.f64 (neg.f64 x.re)))
(*.f64 (fabs.f64 (neg.f64 x.re)) (fabs.f64 (neg.f64 x.re)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.im)))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (fabs.f64 (neg.f64 x.im)) (fabs.f64 (neg.f64 x.im)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(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.re)
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 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 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))
(*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))
(log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))))
(log.f64 (hypot.f64 (neg.f64 x.im) x.re))
(pow.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (fabs.f64 x.re))
(hypot.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 x.re))
(hypot.f64 (neg.f64 (neg.f64 x.im)) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) (neg.f64 x.re))
(hypot.f64 (fabs.f64 (neg.f64 x.im)) x.re)
(hypot.f64 (neg.f64 x.im) (neg.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 x.im) (fabs.f64 (neg.f64 x.re)))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 (neg.f64 x.re)))
(hypot.f64 x.im (fabs.f64 (neg.f64 x.re)))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (*.f64 (log.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (neg.f64 x.im)) (neg.f64 (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 (fabs.f64 (neg.f64 x.im)) (fabs.f64 (neg.f64 x.im)) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(literal 0 binary64)
(*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(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))
#s(literal 1 binary64)
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(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 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (+.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (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 (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (neg x.re) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* 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 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.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 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 (fabs.f64 x.im) (fabs.f64 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)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (cos (+ (* (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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (cos (+ (* (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/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (cos (+ (* (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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* 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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.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 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (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 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.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 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (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 (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (neg x.im) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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 6 binary64)))) (*.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/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (+.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (+.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 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (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 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #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 (*.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))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (cos (+ (* (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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (cos (+ (* (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/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 (cos (+ (* (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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.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 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (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)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 (/.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (/.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (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.im (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 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 (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.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 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (*.f64 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (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/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.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)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (cos (+ (* (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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.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 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 (neg.f64 x.im) 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 (neg.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 (neg.f64 x.im) x.re) y.re)))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (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 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (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 y.im (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (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 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (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 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re) (*.f64 (*.f64 y.re y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (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 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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 (*.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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.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 (neg.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 (neg.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) 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 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))
#s(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 (neg.f64 x.im) x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im)))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.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)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 (neg.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) 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))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 (neg.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 (neg.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 (neg.f64 x.im) x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* (neg x.im) (neg x.im)) (* (neg x.re) (neg x.re))))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (hypot.f64 (neg.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 y.re (atan2.f64 x.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 (neg.f64 x.im) x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) 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))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.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)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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 (neg.f64 x.im) x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 (neg.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))) (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.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 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))))))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.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 (neg.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 (neg.f64 x.im) x.re) y.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.re))))) (pow.f64 (hypot.f64 (neg.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 (neg.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 (neg.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 (neg.f64 x.im) x.re) y.re)))))) (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.re))))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 (neg.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 (neg.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 (neg.f64 x.im) x.re) y.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (neg.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 (neg.f64 x.im) x.re) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.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 (neg.f64 x.im) x.re) y.re)))) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.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 (neg.f64 x.im) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.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 (neg.f64 x.im) x.re) y.re)))) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.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 (neg.f64 x.im) x.re) y.re)))) (*.f64 (-.f64 (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re)))) (*.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (hypot.f64 (neg.f64 x.im) x.re) y.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin (/ (PI) 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.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)) (/ (PI) 2))) (sin (/ (PI) 2))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re))))))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.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 (neg.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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 y.im (fma.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (log.f64 (pow.f64 (hypot.f64 (neg.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)) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 (neg.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)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (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 (neg.f64 x.im) x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))

eval315.0ms (2.6%)

Memory
10.7MiB live, 533.3MiB allocated; 132ms collecting garbage
Compiler

Compiled 199 776 to 9 291 computations (95.3% saved)

prune578.0ms (4.8%)

Memory
16.9MiB live, 923.9MiB allocated; 57ms collecting garbage
Pruning

13 alts after pruning (8 fresh and 5 done)

PrunedKeptTotal
New1 84551 850
Fresh235
Picked235
Done224
Total1 851131 864
Accuracy
95.8%
Counts
1 864 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
37.1%
(*.f64 (/.f64 (pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
38.7%
(*.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.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 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓36.7%
(*.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
37.4%
(*.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))) (fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 #s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
47.2%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.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 (/.f64 (PI.f64) #s(literal 2 binary64))))))
46.4%
(*.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))) (fma.f64 #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))))))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
37.7%
(*.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))) (cos.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))))
76.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))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 (neg.f64 x.im) x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
✓52.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
✓82.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
85.4%
(*.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 (cos (+ (* (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 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓67.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
✓32.9%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
Compiler

Compiled 3 122 to 816 computations (73.9% saved)

regimes52.0ms (0.4%)

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

5 calls:

11.0ms
x.re
11.0ms
y.im
10.0ms
y.re
10.0ms
x.im
7.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
85.4%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
85.4%1x.re
85.4%1x.im
85.4%1y.re
87.5%2y.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes10.0ms (0.1%)

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

2 calls:

4.0ms
y.im
4.0ms
x.im
Results
AccuracySegmentsBranch
85.4%1x.im
85.4%1y.im
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes25.0ms (0.2%)

Memory
-5.8MiB live, 46.6MiB allocated; 7ms 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (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 (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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im 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/4 binary64) (/.f64 (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (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 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (neg.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (-.f64 (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
Calls

5 calls:

4.0ms
y.im
4.0ms
x.im
4.0ms
y.re
4.0ms
x.re
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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
67.8%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
70.7%2x.re
67.8%1y.re
67.8%1y.im
70.8%2x.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes10.0ms (0.1%)

Memory
-26.5MiB live, 20.6MiB allocated; 2ms 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
Calls

5 calls:

3.0ms
y.im
2.0ms
y.re
2.0ms
x.re
2.0ms
x.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
37.2%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
39.6%4y.re
37.0%2y.im
49.3%2x.re
49.5%2x.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes7.0ms (0.1%)

Memory
13.8MiB live, 13.8MiB 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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
Calls

5 calls:

1.0ms
y.im
1.0ms
y.re
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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
34.3%1y.re
34.3%1y.im
34.3%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
34.3%1x.re
34.3%1x.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes6.0ms (0%)

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

5 calls:

1.0ms
y.re
1.0ms
y.im
1.0ms
x.re
1.0ms
x.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
32.9%1x.im
32.9%1y.re
32.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))) (cos.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.9%1x.re
32.9%1y.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch41.0ms (0.3%)

Memory
7.6MiB live, 53.6MiB allocated; 3ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
37.0ms
3.2174250162881866e+29
9.438154792903403e+30
Samples
24.0ms67×1valid
6.0ms45×0valid
Compiler

Compiled 768 to 527 computations (31.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 24.0ms
ival-mult: 6.0ms (24.6% of total)
adjust: 4.0ms (16.4% of total)
ival-hypot: 4.0ms (16.4% of total)
ival-cos: 3.0ms (12.3% of total)
ival-log: 3.0ms (12.3% of total)
ival-atan2: 2.0ms (8.2% of total)
ival-add: 1.0ms (4.1% of total)
ival-exp: 1.0ms (4.1% of total)
ival-sub: 1.0ms (4.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch105.0ms (0.9%)

Memory
-3.3MiB live, 42.2MiB allocated; 4ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
101.0ms
9.467941554663225e+160
2.353400517638709e+168
Samples
82.0ms58×1valid
11.0ms86×0valid
Compiler

Compiled 1 498 to 869 computations (42% saved)

Precisions
Click to see histograms. Total time spent on operations: 87.0ms
ival-mult: 67.0ms (77.1% of total)
ival-hypot: 4.0ms (4.6% of total)
ival-log: 4.0ms (4.6% of total)
adjust: 3.0ms (3.5% of total)
ival-cos: 3.0ms (3.5% of total)
ival-atan2: 2.0ms (2.3% of total)
ival-exp: 1.0ms (1.2% of total)
ival-sub: 1.0ms (1.2% of total)
ival-add: 1.0ms (1.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch52.0ms (0.4%)

Memory
-13.2MiB live, 35.5MiB allocated; 8ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
48.0ms
-4.517837231988146e-298
3.25419345255431e-305
Samples
27.0ms48×1valid
14.0ms112×0valid
Compiler

Compiled 1 260 to 663 computations (47.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-mult: 6.0ms (24.1% of total)
ival-hypot: 5.0ms (20.1% of total)
ival-log: 4.0ms (16.1% of total)
adjust: 3.0ms (12% of total)
ival-cos: 3.0ms (12% of total)
ival-exp: 2.0ms (8% of total)
ival-sub: 1.0ms (4% of total)
ival-atan2: 1.0ms (4% of total)
ival-add: 1.0ms (4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify54.0ms (0.5%)

Memory
11.2MiB live, 56.3MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0120583
1199578
2389578
3868578
43599578
Stop Event
1×node limit
Calls
Call 1
Inputs
(if (<=.f64 y.im #s(literal 6800000000000000472985420955648 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(if (<=.f64 x.im #s(literal 1549999999999999983584169327169817196367203079835457804496486691903424543262083920273442534080266619528931206839330491846502353703567952593900811766867508512948224 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))))
(if (<=.f64 x.im #s(literal 5667263092604697/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))
Outputs
(if (<=.f64 y.im #s(literal 6800000000000000472985420955648 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (neg.f64 x.im) (neg.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(if (<=.f64 y.im #s(literal 6800000000000000472985420955648 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (*.f64 #s(literal -1 binary64) x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 (*.f64 #s(literal -1 binary64) x.im) (*.f64 #s(literal -1 binary64) x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (neg.f64 x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (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 (*.f64 #s(literal -1 binary64) x.im) x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(if (<=.f64 x.im #s(literal 1549999999999999983584169327169817196367203079835457804496486691903424543262083920273442534080266619528931206839330491846502353703567952593900811766867508512948224 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))))
(if (<=.f64 x.im #s(literal 5667263092604697/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))))

derivations156.0ms (1.3%)

Memory
13.5MiB live, 200.4MiB allocated; 22ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 594 to 123 computations (79.3% saved)

preprocess70.0ms (0.6%)

Memory
-31.4MiB live, 155.8MiB allocated; 23ms collecting garbage
Compiler

Compiled 1 262 to 284 computations (77.5% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...